home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2012 February / maximum-cd-2012-02.iso / DiscContents / TheWagerSetup1.2.exe / Assets / Scripts / [29].lua < prev    next >
Encoding:
Text File  |  2011-02-26  |  904 b   |  23 lines
  1. -- Script [29]
  2. Starting = 0;
  3. SeaEvent = 0;
  4.  
  5. CrewID1 = GetIntFlag(0);
  6. CrewID2 = GetIntFlag(1);
  7.  
  8. CrewName1 = GetCrewName(CrewID1);
  9. CrewName2 = GetCrewName(CrewID2);
  10.  
  11. if GetCrewLevel(CrewID1) > GetCrewLevel(CrewID2) then
  12.   KillCrew(CrewID2);
  13.   Victor = CrewName1;
  14.   NonVictor = CrewName2;
  15. else 
  16.   KillCrew(CrewID1);
  17.   Victor = CrewName2;
  18.   NonVictor = CrewName1;
  19. end
  20.  
  21. ShowStoryText("The fight grows fast and violent, and you observe with growing fascination as the two lay into each other with decreasing regard for their own safety. " .. NonVictor .. " is sadly no match for the skills of " .. Victor .. " who neatly skewers the former before you have a chance to intervene. Later, you have " .. Victor .. " congratulated, or possibly flogged depending on your whim.");
  22. AddCaptainsLog("Watched one of my crewmen kill another in a fierce argument. Perhaps I should have intervened.");
  23.